home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / prolog / brklyprl.lha / Emulator / Tests / Passed / test25.pl < prev    next >
Encoding:
Text File  |  1989-04-14  |  152 b   |  8 lines
  1.  
  2. /* Copyright (C) 1988, 1989 Herve' Touati, Aquarius Project, UC Berkeley */
  3.  
  4. main :-
  5.     [a,b] = [X,_], write(X),
  6.     Y = [Z,W], E =.. [X|Y], write(E), nl.
  7.  
  8.